home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1996 February / EnigmA AMIGA RUN 04 (1996)(G.R. Edizioni)(IT)[!][issue 1996-02][Skylink CD III].iso / earcd / patches / pgs3h1.lha / 3.0hUpdate / Install-PageStream3.0h < prev    next >
Text File  |  1995-06-28  |  11KB  |  312 lines

  1. ;PAGESTREAM 3.0h ONLINE UPDATE PATCH INSTALLATION SCRIPT
  2. ;COPYRIGHT ©1995 SOFT-LOGIK PUBLISHING CORPORATION
  3.  
  4. ;update PGS.SAL with latest product price list before release of a patch
  5.  
  6.  
  7.  
  8. ;TEST TO SEE IF THEY HAVE BOTH ARCHIVES
  9. (if (<> (exists "PGSpatch.LHA") 1)
  10.     (abort "You did not download the PGS3H2.LHA archive. Download it and decompress it to the same directory as you decompressed this archive before continuing.")
  11. )
  12.  
  13. ;SEE IF PAGESTREAM3 AND SOFTLOGIK ARE ASSIGNED AND EVERYTHING EXISTS
  14. (set PGSdest (getassign "PageStream3" "a"))
  15. (set SLdest (getassign "SoftLogik" "a"))
  16. (if (OR (= PGSdest "") (= SLdest ""))
  17.     (abort "PageStream3: and/or SoftLogik: are not assigned. You must properly install PageStream3 before applying this update patch.")
  18. )
  19. (set @default-dest PGSdest)
  20. (if (<> (exists "PageStream3:PageStream3") 1)
  21.     (abort "PageStream3 is not in the PageStream3: directory. You must properly install PageStream3 before applying this update patch.")
  22. )
  23. (if (<> (exists "SoftLogik:Libs") 2)
  24.     (makedir "SoftLogik:Libs" (infos))
  25. )
  26. (if (<> (exists "SoftLogik:Engines") 2)
  27.     (makedir "SoftLogik:Engines" (infos))
  28. )
  29. (if (<> (exists "SoftLogik:Printers") 2)
  30.     (makedir "SoftLogik:Printers" (infos))
  31. )
  32. (if (<> (exists "SoftLogik:Filters") 2)
  33.     (makedir "SoftLogik:Filters" (infos))
  34. )
  35. (if (<> (exists "SoftLogik:Effects") 2)
  36.     (makedir "SoftLogik:Effects" (infos))
  37. )
  38. (if (<> (exists "PageStream3:Help") 2)
  39.     (makedir "PageStream3:Help" (infos))
  40. )
  41. (if (<> (exists "PageStream3:Macros") 2)
  42.     (makedir "PageStream3:Macros" (infos))
  43. )
  44. (if (<> (exists "PageStream3:Documents") 2)
  45.     (makedir "PageStream3:Documents" (infos))
  46. )
  47. (if (<> (exists "PageStream3:Documents/Templates") 2)
  48.     (makedir "PageStream3:Documents/Templates" (infos))
  49. )
  50.  
  51. ;COPY THE LHEX PROGRAM TO RAM:
  52. (copyfiles
  53.     (source "PageStream3Disk1:lhex")
  54.     (dest "ram:")
  55.     (nogauge)
  56. )
  57.  
  58. ;SEE WHAT THE USER WANTS TO INSTALL
  59. (set ALLflag 0)
  60. (set SMAflag 1)
  61.  
  62. (message ("\n\nThis patch will update your PageStream3.0g hard drive installation to version 3.0h.\n\nYour original PageStream3 disks will not be modified by this update.\n\nYou MUST have 3.0g installed to use this patch."))
  63. (set install_mode
  64.     (askchoice
  65.         (prompt
  66.             "\nSelect an installation option.\n\nChoose `ALL' if you have a full PageStream3 installation. Choose `ONLY' if you have a custom or minimum PageStream3 installation.\n")
  67.         (choices "Install ALL improved files" "Update ONLY the currently installed files")
  68.         (default 0)
  69.         (help
  70.             "\n\nThe ONLY option will check to see if a file exists before copying the new one to your hard drive. Thus, if you deleted the HP.printer driver because you didn't need it, the new one will not be installed.")
  71.     )
  72. )
  73.  
  74.  
  75. ;DELETE OLD FILES
  76.  
  77. ;DELETE PGS.MIL and PGS.MIS if in wrong directory
  78. (delete "PageStream3:Help/PGS.MIL" (safe))
  79. (delete "PageStream3:Help/PGS.MIS" (safe))
  80. ;DELETE OLD MACRO
  81. (delete "PageStream3:Macros/duplicatetopage.rexx" (safe))
  82. ;DELETE OLD CACHED PFB FILES
  83. (delete "PageStream3:Fonts/Intellifonts/91545.pfb" (safe))
  84. (delete "PageStream3:Fonts/Intellifonts/91547.pfb" (safe))
  85. (delete "PageStream3:Fonts/Intellifonts/91546.pfb" (safe))
  86. (delete "PageStream3:Fonts/Intellifonts/91548.pfb" (safe))
  87.  
  88. ;INSTALL NEW COLOR PALETTE
  89. (if
  90.     (askbool
  91.         (prompt "\n\nDo you want to install the new default color palette file?")
  92.         (help "The new default color palette file has more colors than the previous file. If you have already added colors to your default color palette file, you should skip this step.")
  93.         (choices "Yes" "No")
  94.         (default 0)
  95.     )
  96.     (run "ram:lhex >NIL: <NIL: -qfw=PageStream3: x Colors.LHA")
  97. )
  98. (delete "Colors.LHA" (safe))
  99.  
  100. ;INSTALL NEW FM FILES
  101. (if (= (exists "PageStream3:Fonts/StandardFonts") 2)
  102.     (
  103.         (working "Installing updated font files")
  104.         (run "ram:lhex >NIL: <NIL: -qfw=PageStream3:Fonts/StandardFonts x FM.lha")
  105.         ;UPDATE FONT PATHS
  106.         (if
  107.             (askbool
  108.                 (prompt "The PageStream3:Fonts/StandardFonts path must be updated with the Font Preferences requester. If you know how to do this, click on \"No, I'll do it\"; otherwise, click on \"Do it for me.\"")
  109.                 (help "It's faster to do it yourself if you know how. Doing it automatically will cause all of your font paths to be updated the next time you run PageStream3, which can take a few minutes. You must do it yourself if you don't let PageStream do it automatically.")
  110.                 (choices "Do it for me" "No, I'll do it")
  111.                 (default 0)
  112.             )
  113.             (
  114.                 (textfile
  115.                     (dest "t:PageStream3.prefs")
  116.                     (include "PageStream3:PageStream3.prefs")
  117.                     (append "UPDATEFONTPATHS TRUE\n")
  118.                     (safe)
  119.                 )
  120.                 (delete "PageStream3:PageStream3.prefs" (safe))
  121.                 (copyfiles
  122.                     (source "t:PageStream3.prefs")
  123.                     (dest "PageStream3:")
  124.                     (nogauge)
  125.                 )
  126.                 (delete "t:PageStream3.prefs" (safe))
  127.             )
  128.         )
  129.     )
  130. )
  131. (delete "FM.LHA" (safe))
  132.  
  133. ;UPDATE LIBS
  134. (working "Installing Updated Libraries...")
  135. (run "ram:lhex >NIL: <NIL: -qfw=SoftLogik:Libs x Libs.lha")
  136. (delete "Libs.LHA" (safe))
  137.  
  138. ;UPDATE TIPS
  139. (run "ram:lhex >NIL: <NIL: -qfw=PageStream3:Help x Tips.LHA")
  140. (delete "Tips.LHA" (safe))
  141.  
  142. ;UPDATE PRINTER DRIVERS
  143. (working "Installing Updated Printer Drivers...")
  144. (if (OR (= install_mode ALLflag) (exists "SoftLogik:Printers/PostScript.printer"))
  145.     (run "ram:lhex >NIL: <NIL: -qfw=SoftLogik:Printers x PostScript.lha")
  146. )
  147. (delete "PostScript.LHA" (safe))
  148.  
  149. (if (OR (= install_mode ALLflag) (exists "SoftLogik:Printers/HP.printer"))
  150.     (run "ram:lhex >NIL: <NIL: -qfw=SoftLogik:Printers x HP.lha")
  151. )
  152. (delete "HP.LHA" (safe))
  153.  
  154. (if (OR (= install_mode ALLflag) (exists "SoftLogik:Printers/Fargo.printer"))
  155.     (run "ram:lhex >NIL: <NIL: -qfw=SoftLogik:Printers x Fargo.lha")
  156. )
  157. (delete "Fargo.LHA" (safe))
  158.  
  159. ;UPDATE ENGINES
  160. (working "Installing Updated Engines...")
  161. (run "ram:lhex >NIL: <NIL: -qfw=SoftLogik:Engines x Engines.lha")
  162. (delete "Engines.LHA" (safe))
  163.  
  164. ;UPDATE FILTERS
  165. (working "Installing Updated Filters & Effects...")
  166. (run "ram:lhex >NIL: <NIL: -qfw=SoftLogik:Filters x Filters.lha")
  167. (delete "Filters.LHA" (safe))
  168.  
  169. (if (OR (= install_mode ALLflag) (exists "SoftLogik:Filters/ArtExpression.gfilter"))
  170.     (run "ram:lhex >NIL: <NIL: -qfw=SoftLogik:Filters x FilterAE.lha")
  171. )
  172. (delete "FilterAE.LHA" (safe))
  173.  
  174. (if (OR (= install_mode ALLflag) (exists "SoftLogik:Filters/PageStream2.dfilter"))
  175.     (run "ram:lhex >NIL: <NIL: -qfw=SoftLogik:Filters x FilterPGS.lha")
  176. )
  177. (delete "FilterPGS.LHA" (safe))
  178.  
  179. (if (OR (= install_mode ALLflag) (exists "SoftLogik:Filters/ProWrite.tfilter"))
  180.     (run "ram:lhex >NIL: <NIL: -qfw=SoftLogik:Filters x FilterPW.lha")
  181. )
  182. (delete "FilterPW.LHA" (safe))
  183.  
  184. (if (OR (= install_mode ALLflag) (exists "SoftLogik:Filters/Wordworth.tfilter"))
  185.     (run "ram:lhex >NIL: <NIL: -qfw=SoftLogik:Filters x FilterWW.lha")
  186. )
  187. (delete "FilterWW.LHA" (safe))
  188.  
  189. (if (OR (= install_mode ALLflag) (exists "SoftLogik:Effects/Brightness.effect"))
  190.     (run "ram:lhex >NIL: <NIL: -qfw=SoftLogik:Effects x Brightness.LHA")
  191. )
  192. (delete "Brightness.LHA" (safe))
  193.  
  194. (if (OR (= install_mode ALLflag) (exists "SoftLogik:Effects/Contrast.effect"))
  195.     (run "ram:lhex >NIL: <NIL: -qfw=SoftLogik:Effects x Contrast.LHA")
  196. )
  197. (delete "Contrast.LHA" (safe))
  198.  
  199. (if (OR (= install_mode ALLflag) (exists "SoftLogik:Effects/Emboss.effect"))
  200.     (run "ram:lhex >NIL: <NIL: -qfw=SoftLogik:Effects x Emboss.LHA")
  201. )
  202. (delete "Emboss.LHA" (safe))
  203.  
  204. (if (OR (= install_mode ALLflag) (exists "SoftLogik:Effects/Sharpen.effect"))
  205.     (run "ram:lhex >NIL: <NIL: -qfw=SoftLogik:Effects x Sharpen.LHA")
  206. )
  207. (delete "Sharpen.LHA" (safe))
  208.  
  209. ;INSTALL SAMPLE TEMPLATES
  210. (if
  211.     (askbool
  212.         (prompt "\n\nDo you want to install samples of the\nDirectTemplates package?\n\nThey will be installed in your PageStream3:Documents/Templates directory.")
  213.         (help "DirectTemplates is a collection of 488 templates for PaperDirect® papers. If you would like to examine fourteen samples, click on Yes and then open them in PageStream3 after installation is complete.")
  214.         (choices "Yes" "No")
  215.         (default 0)
  216.     )
  217.     (run "ram:lhex >NIL: <NIL: -qfw=PageStream3:Documents/Templates x Templates.LHA")
  218. )
  219. (delete "Templates.LHA" (safe))
  220.  
  221. ;UPDATE HELP
  222. (if (exists "PageStream3:Help/PGS.HEL")
  223.     (run "ram:lhex >NIL: <NIL: -qfw=PageStream3:Help x Help.LHA")
  224. )
  225. (delete "Help.LHA" (safe))
  226.  
  227. ;UPDATE MACROS
  228. (if (exists "PageStream3:Macros/PageStream3.macros")
  229.     (
  230.         (rename "PageStream3:Macros/PageStream3.macros" "PageStream3:Macros/PageStream3.macros.bak")
  231.         (message "\nYour PageStream3.macros file has been renamed to PageStream3.macros.bak. If you have added your own macros to PageStream3, you will need to append them to the new macros file.\n\nRefer to page 339 for more information.")
  232.     )
  233. )
  234. (working "Installing Updated Macros...")
  235. (run "ram:lhex >NIL: <NIL: -qfw=PageStream3:Macros x Macros.lha")
  236. (delete "Macros.LHA" (safe))
  237.  
  238.  
  239. ;UPDATE PAGELINER2
  240. (if (exists "PageStream3:PageLiner")
  241.     (
  242.         (working "Patching PageLiner to 2.0e...")
  243.         (run "ram:lhex >NIL: <NIL: -qfw=ram: x PLpatch.LHA")
  244.         (run "spatch >NIL: <NIL: -oPageStream3:PageLiner2.0e -pram:PageLiner.pch PageStream3:PageLiner")
  245.         (if (exists "PageStream3:PageLiner2.0e")
  246.             (
  247.                 (delete "PageStream3:PageLiner")
  248.                 (rename "PageStream3:PageLiner2.0e" "PageStream3:PageLiner")
  249.             )
  250.             (message "\nThe patch to PageLiner was not successful. Refer to the Read.1st! file for further instructions.")
  251.         )
  252.         (delete "ram:PageLiner.pch" (safe))
  253.     )
  254. )
  255. (delete "PLpatch.LHA" (safe))
  256.  
  257. ;UPDATE BME2
  258. (if (exists "PageStream3:BME")
  259.     (
  260.         (working "Patching BME to 2.0b...")
  261.         (run "ram:lhex >NIL: <NIL: -qfw=ram: x BMEpatch.LHA")
  262.         (run "spatch >NIL: <NIL: -oPageStream3:BME2.0c -pram:BME.pch PageStream3:BME")
  263.         (if (exists "PageStream3:BME2.0c")
  264.             (
  265.                 (delete "PageStream3:BME")
  266.                 (rename "PageStream3:BME2.0c" "PageStream3:BME")
  267.             )
  268.             (message "\nThe patch to BME was not successful. Refer to the Read.1st! file for further instructions.")
  269.         )
  270.         (delete "ram:BME.pch" (safe))
  271.     )
  272. )
  273. (delete "BMEpatch.LHA" (safe))
  274.  
  275. ;UPDATE PAGESTREAM3
  276. (working "Patching PageStream to 3.0h...\n\nThis will take from one to five minutes.")
  277. (run "ram:lhex >NIL: <NIL: -qfw=ram: x PGSpatch.LHA")
  278. (delete "PGSpatch.LHA" (safe))
  279. (run "spatch >NIL: <NIL: -oPageStream3:PageStream3.0h -pram:PageStream3.pch PageStream3:PageStream3")
  280. (if (exists "PageStream3:PageStream3.0h")
  281.         (
  282.                 (delete "PageStream3:PageStream3")
  283.                 (rename "PageStream3:PageStream3.0h" "PageStream3:PageStream3")
  284.         )
  285.         (abort "The patch to PageStream3 was not successful. Refer to the Read.1st! file for instructions.")
  286. )
  287. (delete "ram:PageStream3.pch" (safe))
  288.  
  289.  
  290.  
  291. ;DISPLAY README (Try 3 different ways!)
  292. (run "ram:lhex >NIL: <NIL: -qfw=PageStream3: x Read.LHA")
  293. (delete "Read.LHA" (safe))
  294. (IF (> (run "Sys:Utilities/MultiView PageStream3:ReadMe.Now") 0)
  295.         (IF (> (run "Sys:Utilities/AmigaGuide PageStream3:ReadMe.Now") 0)
  296.                 (run "More PageStream3:ReadMe.Now")
  297.         )
  298. )
  299.  
  300. ;REMOVE THE LHEX PROGRAM
  301. (delete "ram:lhex" (safe))
  302. (delete "spatch" (safe))
  303. (delete "Install-PageStream3.0h.info" (safe))
  304.  
  305. (message "NEW!\n\nThe new TrueType Font Engine allows you to use TrueType fonts with PageStream3! Now available separately for $25.\n\nGary's Effects (12 new effects for BME) is now available separately for $25.\n\nDirect Templates for PaperDirect® papers is now available separately for $30.\n\nCall 1-800-829-8608 (314-256-9595) to order!")
  306.  
  307. ;WARN TO REBOOT
  308. (message "\n\nIf you have already run PageStream3 without turning off or rebooting your computer, you should reboot your computer after this installation is complete.")
  309.  
  310. ;FINALLY DONE
  311. (exit "PageStream 3.0h installed!")
  312.